(f90-comment-indent): Do not move point in default case.

diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el
index cdbc24cd391769b57bb33845ca6d4ae5b9768783..6b0a44f44abaffb35acbcaabe752a7b38ae31c2c 100644 (file)
--- a/lisp/progmodes/f90.el
+++ b/lisp/progmodes/f90.el
@@ -1007,8 +1007,9 @@ All others return `comment-column', leaving at least one space after code."
                (skip-chars-backward " \t")
                (bolp)))
         (f90-calculate-indent))
-       (t (skip-chars-backward " \t")
-          (max (if (bolp) 0 (1+ (current-column))) comment-column))))
+       (t (save-excursion
+             (skip-chars-backward " \t")
+             (max (if (bolp) 0 (1+ (current-column))) comment-column)))))
 
 (defsubst f90-present-statement-cont ()
   "Return continuation properties of present statement.